home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / Libraries / Graphic Elements 2 / GETest / Meter.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-28  |  958 b   |  41 lines  |  [TEXT/MPS ]
  1. /*
  2.     Meter.h
  3.     
  4.     System Use meter for GEDemo
  5.     
  6.     Copyright 1993 by Al Evans. All rights reserved.
  7.     
  8.     11/5/93
  9. */
  10.  
  11. #include "Meter.h"
  12.  
  13. Boolean LoadUsageMeterScene(GEWorldPtr world)
  14. {
  15.     GrafElPtr        meterBkg, thisElement;
  16.     
  17.     //Get meter bkg picture
  18.     meterBkg = NewBasicPICT(world, meterBkgID, meterPlane, rMeterBkg,
  19.                                 transparent, meterLeft, meterTop);
  20.     if (meterBkg == nil) return false;
  21.     
  22.     //Get Indicator picture
  23.     thisElement = NewScrollingGraphic(world, meterIndID, indPlane, rMeterInd,
  24.                                 srcCopy, indLeft, indTop);
  25.     if (thisElement == nil) return false;
  26.     
  27.     //Show only top 10 pixels of indicator
  28.     thisElement->animationRect.bottom = thisElement->animationRect.top + ScaleToWorld(world, 10);
  29.     //Connect indicator to bkg
  30.     meterBkg->slaveGrafEl = thisElement;
  31.     return true;
  32. }
  33.  
  34. pascal void SetMeterReading(GEWorldPtr world, short percent)
  35. {
  36.     if (percent < 0) percent = 0;
  37.     if (percent > 100) percent = 100;
  38.     
  39.     SetScroll(world, meterIndID, 0, percent);
  40. }
  41.